home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 5 / developer source - volume 5.iso / orinf / aug96 / hoskf113.gif < prev    next >
Graphics Interchange Format  |  1996-11-26  |  16.9 KB  |  794x574  |  4-bit (13 colors)
   ocr: btnClose Properties 40 D V Click Sub Clicko IF work is pending, THEN Warn the user and do not close the form; otherwise, close the form as requested. Test if udpReCHgrUDJect has been set IF IsNulll Cont: ainer.udpkeceCMgrUDJect ) then contalner.uapkecHgrUbJect = Container. vecioptontainero Test if rechgrubject has RecordSource Use a variant IWP to represent swOrkrending IF LEN( Container.udpRechgrUbject.RecordSource ) == 0 THEN IWP = FALSE ELSE IWP == contalner.udpRechecHigrUpject.JetRecordset(J.tetsession(.IstorkPending0) END IF Check IF work has been committed IF IWP THEN IF IsNulll Applicat ...